home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Home of Orchestra World
/
Home of Orchestra World.iso
/
musician.dir
/
00066_Script_66
< prev
next >
Wrap
Text File
|
1980-01-05
|
2KB
|
64 lines
on buttonRoll
puppetSprite 36,TRUE
puppetSprite 37,TRUE
puppetSprite 38,TRUE
puppetSprite 39,TRUE
puppetSprite 40,TRUE
puppetSprite 41,TRUE
--puppetSprite 16,TRUE
--puppetSprite 17,TRUE
--puppetSprite 18,TRUE
--puppetSprite 19,TRUE
-- puppetSprite 20,TRUE
-- puppetSprite 21,TRUE
--puppetSprite 17,TRUE
set the immediate of sprite 36 to TRUE
set the immediate of sprite 37 to TRUE
set the immediate of sprite 38 to TRUE
set the immediate of sprite 39 to TRUE
set the immediate of sprite 40 to TRUE
set the immediate of sprite 41 to TRUE
--set the immediate of sprite 16 to TRUE
-- set the immediate of sprite 17 to TRUE
--set the immediate of sprite 18 to TRUE
-- set the immediate of sprite 19 to TRUE
-- set the immediate of sprite 20 to TRUE
-- set the immediate of sprite 21 to TRUE
-- set the immediate of sprite 17 to TRUE
if rollover(36) = TRUE then
set the castNum of sprite 41 to the number of cast "a"
else
set the castNum of sprite 41 to the number of cast "blank.pct"
end if
if rollover(37) = TRUE then
set the castNum of sprite 41 to the number of cast "b"
else
set the castNum of sprite 41 to the number of cast "blank.pct"
end if
if rollover(38) = TRUE then
set the castNum of sprite 41 to the number of cast "c"
else
set the castNum of sprite 41 to the number of cast "blank.pct"
end if
if rollover(39) = TRUE then
set the castNum of sprite 41 to the number of cast "d"
else
set the castNum of sprite 41 to the number of cast "blank.pct"
end if
if rollover(40) = TRUE then
set the castNum of sprite 41 to the number of cast "e"
else
set the castNum of sprite 41 to the number of cast "blank.pct"
end if
go to the frame
end buttonRoll